10 PRINTCHR$(147)
20 INPUT "FILENAME[160]";NF$
30 NF$="0:"+ NF$ +",S,R"
40 OPEN9,8,9,NF$
50 INPUT#9,A$
60 PRINT A$
70 IF ST=0 THEN 50
80 CLOSE9